home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD BIT 75
/
CD BIT 75.iso
/
Software
/
LogOut
/
disk1
/
_SETUP.1
/
GCondom7.exe
/
0
/
RCDATA
/
TFREXPRFORM
/
TFREXPRFORM.txt
Wrap
Text File
|
2004-10-21
|
6KB
|
224 lines
object frExprForm: TfrExprForm
Left = 200
Top = 108
ActiveControl = ExprMemo
BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
BorderStyle = bsDialog
Caption = 'Expression builder'
ClientHeight = 233
ClientWidth = 321
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
Position = poScreenCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 4
Top = 8
Width = 313
Height = 105
Caption = 'Expression'
TabOrder = 0
object ExprMemo: TMemo
Left = 8
Top = 16
Width = 297
Height = 81
HelpContext = 179
TabOrder = 0
OnKeyDown = ExprMemoKeyDown
end
end
object GroupBox2: TGroupBox
Left = 4
Top = 120
Width = 313
Height = 73
Caption = 'Insert'
TabOrder = 1
object frSpeedButton1: TfrSpeedButton
Left = 8
Top = 44
Width = 22
Height = 22
Caption = '+'
OnClick = frSpeedButton1Click
end
object frSpeedButton2: TfrSpeedButton
Left = 30
Top = 44
Width = 22
Height = 22
Caption = '-'
OnClick = frSpeedButton1Click
end
object frSpeedButton3: TfrSpeedButton
Left = 52
Top = 44
Width = 22
Height = 22
Caption = '*'
OnClick = frSpeedButton1Click
end
object frSpeedButton4: TfrSpeedButton
Left = 74
Top = 44
Width = 22
Height = 22
Caption = '/'
OnClick = frSpeedButton1Click
end
object frSpeedButton5: TfrSpeedButton
Left = 96
Top = 44
Width = 22
Height = 22
Caption = '='
OnClick = frSpeedButton1Click
end
object frSpeedButton6: TfrSpeedButton
Left = 118
Top = 44
Width = 22
Height = 22
Caption = '<>'
OnClick = frSpeedButton1Click
end
object frSpeedButton7: TfrSpeedButton
Left = 140
Top = 44
Width = 22
Height = 22
Caption = '>'
OnClick = frSpeedButton1Click
end
object frSpeedButton8: TfrSpeedButton
Left = 162
Top = 44
Width = 22
Height = 22
Caption = '<'
OnClick = frSpeedButton1Click
end
object frSpeedButton9: TfrSpeedButton
Left = 184
Top = 44
Width = 22
Height = 22
Caption = '>='
OnClick = frSpeedButton1Click
end
object frSpeedButton10: TfrSpeedButton
Left = 206
Top = 44
Width = 22
Height = 22
Caption = '<='
OnClick = frSpeedButton1Click
end
object frSpeedButton11: TfrSpeedButton
Left = 228
Top = 44
Width = 28
Height = 22
Caption = 'And'
OnClick = frSpeedButton1Click
end
object frSpeedButton12: TfrSpeedButton
Left = 256
Top = 44
Width = 22
Height = 22
Caption = 'Or'
OnClick = frSpeedButton1Click
end
object frSpeedButton13: TfrSpeedButton
Left = 278
Top = 44
Width = 27
Height = 22
Caption = 'Not'
OnClick = frSpeedButton1Click
end
object InsDBBtn: TfrSpeedButton
Left = 8
Top = 16
Width = 97
Height = 22
Caption = 'DB field...'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
22220000000000000002888888888888880287FFFFFFFFFFF80287FFFFFFFFFF
F80287F8888F8888F80287FFFFFFFFFFF80287F8888F8888F80287FFFFFFFFFF
F80287F8888F8888F80287FFFFFFFFFFF8028788888888888802874C4C4C4F0F
0802877777777777780288888888888888822222222222222222}
Margin = 4
OnClick = InsDBBtnClick
end
object InsVarBtn: TfrSpeedButton
Left = 108
Top = 16
Width = 97
Height = 22
Caption = 'Variable...'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333883333333333333008833333338333822
08333339088822222033333990882A222233333999002AA22233333991113322
3333333991338888833333391338C6C083333333333366C08333333333333CC0
83333333333366C4333333333333333333333333333333333333}
Margin = 2
Spacing = 2
OnClick = InsVarBtnClick
end
object InsFuncBtn: TfrSpeedButton
Left = 208
Top = 16
Width = 97
Height = 22
Caption = 'Function...'
Glyph.Data = {
D6000000424DD60000000000000076000000280000000C0000000C0000000100
0400000000006000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00707777777777
0000770777777777000077087007007700007780778007770000778087700077
0000777087007807000077780777777700007700000777770000777708777777
0000777700780777000077777000777700007777777777770000}
Margin = 4
OnClick = InsFuncBtnClick
end
end
object Button1: TButton
Left = 160
Top = 204
Width = 75
Height = 25
HelpContext = 40
Caption = 'OK'
ModalResult = 1
TabOrder = 2
end
object Button2: TButton
Left = 240
Top = 204
Width = 75
Height = 25
HelpContext = 50
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 3
end
end